﻿Imports System.Data
Imports System.Data.OleDb
Imports DTO
Public Module TiepNhanDAO
    Public Function LayDanhSach() As DataTable
        Dim dt As DataTable = New DataTable()
        ''tao va mo ket noi 
        Dim con As OleDbConnection = DataAccess.TaoKetNoi()
        '' tao cau truy van 
        Dim str As String = "select*from TiepNhan"
        Dim adapter As OleDbDataAdapter = New OleDbDataAdapter(str, con)
        adapter.Fill(dt)
        Return dt
    End Function
End Module
